home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
ab20
/
ab20_archive
/
utilities
/
editors
/
emacs-18.58.lha
/
emacs
/
.emacs-menu-src
< prev
next >
Wrap
Text File
|
1992-01-21
|
1KB
|
40 lines
(amiga-menus-set
(list
(list "Project" (menu-items '(("Open" find-file ?O)
("Save" save-buffer ?S)
("Save As" write-file ?W)
()
("Quit" check-exit ?Q))))
(list "Window" (menu-items '(("Split" split-window-vertically ?2)
("Split H" split-window-horizontally)
()
("One Window" delete-other-windows ?1)
("Delete" delete-window ?0)
()
("Enlarge" enlarge-window ?E)
("Next" other-window ?N))))
(list "Buffers" (menu-items '(("List" list-buffers)
("Change" switch-to-buffer)
("Kill" kill-buffer))))
(list "Edit" (menu-items '(("Undo" undo ?U)
()
("Mark" set-mark-command)
("Cut" kill-region ?X)
("Copy" copy-region-as-kill ?C)
("Paste" yank ?V)
("Paste Previous" yank-pop))))
(list "Search" (menu-items '(("Find Forward" isearch-forward ?F)
("Find Backward" isearch-backward ?B)
()
("Find Fwd Regexp" isearch-forward-regexp)
("Find Bwd Regexp" isearch-backward-regexp)
()
("Query Replace" query-replace ?R)
("Query Rpl Regexp" query-replace-regexp))))
(list "Help" (menu-items '(("Tutorial" help-with-tutorial ?T)
("Information" info ?H)
()
("Where Is Command" where-is)
("What Is Command" describe-function)
("What Is Key" describe-key)
("Apropos" command-apropos))))))